%% Part of Computer Shop Demo
%% 
-include_lib("ect/include/ect.hrl").

-class(monitor).
-import_class(device).
-superclass(device).
?FIELDS(1, public, {age}).
-methods([print/1]).
-export([dotest/0]).

print(This = #monitor{age = Age}) ->
    io:format("MONITOR:~n"),
    {{This}}:print(),
    io:format("Age = ~p~n", [Age]).

dotest() ->
    {#monitor{}}:dotest().